home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Macworld: Max Your Mac
/
Macworld - Max Your Mac.iso
/
Install AOL v2.7 w⁄Browser
/
Install AOL v2.7 w_Browser
/
TCPack
< prev
next >
Wrap
Text File
|
1996-04-12
|
3KB
|
109 lines
!*****************************************************************************
! C O P Y R I G H T A N D C O N F I D E N T I A L I T Y N O T I C E
!*****************************************************************************
!
! Copyright © 1987-1994 America Online, Inc. All rights reserved.
! This software contains valuable confidential and proprietary
! information of America Online, Inc. and is subject to applicable
! licensing agreements. Unauthorized reproduction, transmission or
! distribution of this file and its contents is a violation of
! applicable laws.
!
! A M E R I C A O N L I N E C O N F I D E N T I A L
!
!*****************************************************************************
!
! Connect Sequence:
!
-LABEL 0
! Turn off 'no carrier' detection, it doesn't apply for tcp.
SetScan ""
! TTY_On { Turns off error checking, TCP is error free -- uncomment for more speed }
CanBtn 19 { if cancel button - just exit }
DsplyMsg "Initializing Connection."
SetTries 0
ChrDelay 2
DsplyPic 1
!
!----------------------------------
!
-LABEL 1 { check for ctb }
NoCTB "CTBNotPresent"
!-----------------------------------
-Label 2
!
-Label 3
!-----------------------------------
-LABEL 4 { try to connect }
DsplyMsg "Opening Connection"
CTBTool "ToolErr" "ParamErr" 0 "TCPack for AOL"
CTBParam "ParamErr" 0 "RemoteTCPPort 5190 TelnetProtocol false HighThroughput true"
!
CTBParam "ParamErr" 0 "RemoteAddress ""AmericaOnline.aol.com[0]"""
CTBOPEN "SecondTry"
Jump 12
!
-Label SecondTry
CTBParam "ParamErr" 0 "RemoteAddress ""AmericaOnline.aol.com[1]"""
CTBOPEN "ThirdTry"
Jump 12
!
-Label ThirdTry
CTBParam "ParamErr" 0 "RemoteAddress ""AmericaOnline.aol.com[2]"""
CTBOPEN "FourthTry"
Jump 12
!
-Label FourthTry
CTBParam "ParamErr" 0 "RemoteAddress ""AmericaOnline.aol.com[3]"""
CTBOPEN "CTBOpenFail"
!-----------------------------------
!
-LABEL 12 { we're connected }
DsplyPic 2
SetSpeed 2 { this represents a tcp connection }
!-------------------------------
!
-LABEL 15 { = for term ID}
! Sending Terminal Identifier
!
!
!-----------------------------------
!
-LABEL 16 { @ for Host num}
! Sending America Online node number.
-LABEL 17 { System Ready ... All is well }
Exit 0
!
-Label ToolErr
OneAlert 1 "This ccl requires TCPack for AOL!"
Exit -111
!
-Label ParamErr
OneAlert 1 "Can't find the AOL host nameserver. Try again later."
Jump "CTBOpenFail"
!-----------------------------------
!
-Label 18 { User aborted sequence }
Exit -111
!
-Label 19 { User aborted sequence...dont need to hang up though}
Exit -111
!
!-----------------------------------
-Label CTBNotPresent
IfEq ~ATMP 1
OneAlert 1 "The CommToolbox is not present. You cannot connect with this CCL!."
Exit -1
-Label CTBOpenFail
IfEq ~ATMP 1
OneAlert 1 "Couldn't open the connection with the AOL host. Please try again later."
CTBClose
Exit -1
!------------------------------------
!
*-Label 0 {Hangup Sequence}
*CTBClose
*Exit 0
###